home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 2.iso / STUTTGART / FROMUTS / UNIXLIB37B / src / c / strchr < prev    next >
Text File  |  1991-09-23  |  1KB  |  66 lines
  1. #ifdef __STDC__
  2. static char sccs_id[] = "@(#) strchr.c 1.1 "__DATE__" HJR";
  3. #else
  4. static char sccs_id[] = "@(#) strchr.c 1.1 26/9/90 HJR";
  5. #endif
  6.  
  7. /* strchr.c (c) Copyright 1990 H.Rogers */
  8.  
  9. #ifndef __STDC__
  10. #include "sys/types.h"
  11. #endif
  12. #include <string.h>
  13.  
  14. #ifdef __STDC__
  15. char *strchr(register const char *s,register int c)
  16. #else
  17. char *strchr(s,c)
  18. register const char *s;
  19. register int c;
  20. #endif
  21. {
  22. register int i;
  23.  
  24. while (i = *s++) if (i == c) return((char *)--s);
  25.  
  26. return(0);
  27. }
  28.  
  29. #ifdef __STDC__
  30. char *strrchr(register const char *s,register int c)
  31. #else
  32. char *strrchr(s,c)
  33. register const char *s;
  34. register int c;
  35. #endif
  36. {
  37. register int i;
  38. register const char *_s;
  39.  
  40. _s = 0; do if ((i = *s) == c) _s = s; while (s++,i);
  41.  
  42. return((char *)_s);
  43. }
  44.  
  45.  
  46. #ifdef __STDC__
  47. char *(index)(register const char *s,register int c)
  48. #else
  49. char *(index)(s,c)
  50. register const char *s;
  51. register int c;
  52. #endif
  53. {
  54. return(index(s,c));
  55. }
  56. #ifdef __STDC__
  57. char *(rindex)(register const char *s,register int c)
  58. #else
  59. char *(rindex)(s,c)
  60. register const char *s;
  61. register int c;
  62. #endif
  63. {
  64. return(rindex(s,c));
  65. }
  66.